Suzy B Software 2

home *** CD-ROM | disk | FTP | other *** search

/ Suzy B Software 2 / Suzy B Software CD-ROM 2 (1994).iso / stos / stos_91 / upstart / up.bas

(.txt)

Wrap

Atari STOS Basic | 1987-04-21 | 114KB | 431 lines

100 CLEAR KEY 1000 MUSIC 10000 VARNAME 1001 FADE 1005 FADE 1006 FLASH 1007 IF 101 GOSUB 1010 SPRITE 1011 MOVE Y 1012 MOVE Y 1013 MOVE Y 1014 MOVE Y 1015 MOVE Y 1016 MOVE Y 1017 MOVE Y 1019 MOVE 1020 SPRITE 1021 SPRITE 1022 SPRITE 1023 SPRITE 1024 SPRITE 1025 VARNAME 1026 SPRITE 1030 ON 1031 ANIM 1032 IF 1035 FOR 1037 IF 1039 NEXT 1040 ANIM 1045 WAIT 1049 GOTO 105 IF 1050 ANIM 1051 ANIM 1052 ANIM 1053 ANIM 1054 ANIM 1055 ANIM 1056 ANIM 1057 ANIM 1058 ANIM 1059 ANIM 110 IF 112 IF 113 GOSUB 114 IF 116 IF 117 IF 121 IF 123 IF 125 IF 127 IF 128 GOSUB 129 IF 130 GOSUB 131 IF 132 IF 134 IF 136 GOSUB 138 IF 139 IF 140 IF 141 IF 142 IF 143 IF 144 IF 145 IF 146 IF 147 IF 148 IF 149 IF 150 IF 1500 PEN 1501 LOCATE 1509 WRITING 151 IF 152 IF 153 IF 155 VARNAME 156 IF 158 IF 1600 ANIM 1605 IF 1606 IF 1607 IF 1608 IF 1609 IF 1620 VARNAME 1621 VARNAME 1622 VARNAME 1623 VARNAME 1624 VARNAME 1630 GOSUB 1635 PEN 1636 VARNAME 1637 VARNAME 1638 VARNAME 1639 IF 1640 IF 1641 IF 1642 IF 1645 PAPER 1649 ANIM 1690 IF 199 GOTO 200 IF 2000 IF 2009 GOTO 201 VARNAME 202 VARNAME 203 MOVE 204 IF 205 RETURN 206 IF 210 IF 211 VARNAME 212 VARNAME 215 IF 216 IF 217 IF 218 IF 219 IF 220 IF 221 IF 222 IF 223 IF 224 IF 235 RETURN 236 IF 237 VARNAME 238 VARNAME 239 IF 240 IF 241 IF 242 IF 243 IF 244 IF 245 IF 246 IF 247 IF 248 IF 259 RETURN 260 IF 261 VARNAME 262 VARNAME 263 IF 264 IF 265 IF 266 IF 267 IF 268 IF 269 IF 270 IF 271 IF 272 IF 283 RETURN 300 IF 301 IF 302 DEC 303 IF 304 IF 305 DEC 306 IF 307 IF 308 DEC 309 IF 310 IF 311 DEC 320 IF 321 VARNAME 322 VARNAME 323 IF 324 IF 325 IF 326 IF 327 IF 328 IF 329 IF 330 IF 331 IF 332 IF 343 RETURN 345 IF 346 IF 347 IF 348 IF 349 RETURN 350 MUSIC 354 GOTO 355 MUSIC 359 GOTO 360 MUSIC 364 GOTO 365 MUSIC 369 VARNAME 370 IF 371 VARNAME 372 VARNAME 373 DEC 374 IF 375 RETURN 376 DEC 377 MUSIC 378 INK 379 RETURN 40 VARNAME 400 POP 40000 EXTENSION (Index #0) (Token 0x80) 40001 FADE 40011 VARNAME 40012 SPRITE 40013 GOSUB 40014 GOSUB 40015 GOSUB 40016 SPRITE 40017 SPRITE 40018 GOSUB 40050 IF 40051 IF 40055 VARNAME 40060 POP 40090 FADE 40091 FLASH 40099 RETURN 401 MUSIC 402 INC 405 SPRITE 410 IF 411 IF 412 IF 415 MOVE Y 416 MOVE 417 IF 420 SPRITE 421 ANIM 422 IF 423 MOVE Y 424 IF 425 REM 429 GOTO 430 SPRITE 431 IF 435 IF 439 MUSIC 440 GOSUB 441 MUSIC 445 SCREEN COPY 450 WAIT 452 SCREEN COPY 455 WAIT 457 SCREEN COPY 460 WAIT 462 SCREEN COPY 463 SCREEN COPY 467 MUSIC 469 IF 472 DEC 475 GOSUB 479 GOTO 480 GOSUB 481 BOOM 485 SPRITE 486 SPRITE 487 MOVE Y 489 IF 490 IF 491 IF 492 IF 493 IF 494 IF 495 VARNAME 496 DEC 497 GOSUB 498 GOSUB 499 GOTO 50 MODE 500 SPRITE 50000 RESTORE 50001 RESTORE 50002 NEXT 50005 DATA 50010 DATA 50011 DATA 50012 DATA 50013 DATA 50014 DATA 50015 DATA 50016 DATA 50017 DATA 50018 DATA 50019 DATA 50020 DATA 50021 DATA 50022 DATA 50035 DATA 50036 DATA 50037 DATA 50038 DATA 50039 DATA 50040 DATA 50041 DATA 50042 DATA 50043 DATA 50044 DATA 50045 DATA 50046 DATA 50047 DATA 50060 DATA 50061 DATA 50062 DATA 50063 DATA 50064 DATA 50065 DATA 50066 DATA 50067 DATA 50068 DATA 50069 DATA 50070 DATA 50071 DATA 50072 DATA 50085 DATA 50086 DATA 50087 DATA 50088 DATA 50089 DATA 50090 DATA 50091 DATA 50092 DATA 50093 DATA 50094 DATA 50095 DATA 50096 DATA 50097 DATA 50110 DATA 50111 DATA 50112 DATA 50113 DATA 50114 DATA 50115 DATA 50116 DATA 50117 DATA 50118 DATA 50119 DATA 50120 DATA 50121 DATA 50122 DATA 50135 DATA 50136 DATA 50137 DATA 50138 DATA 50139 DATA 50140 DATA 50141 DATA 50142 DATA 50143 DATA 50144 DATA 50145 DATA 50146 DATA 50147 DATA 50160 DATA 50161 DATA 50162 DATA 50163 DATA 50164 DATA 50165 DATA 50166 DATA 50167 DATA 50168 DATA 50169 DATA 50170 DATA 50171 DATA 50172 DATA 51 PALETTE 510 MUSIC 512 SPRITE 515 IF 516 SPRITE 517 MOVE Y 518 IF 519 GOTO 52 WINDOPEN 525 SCREEN COPY 526 IF 527 GOTO 53 LIMIT SPRITE 530 IF 531 IF 532 IF 533 IF 534 IF 535 LOCATE 536 PEN 537 RETURN 540 PEN 541 INK 542 INK 545 IF 55 GOTO 550 PEN 551 IF 552 VARNAME 559 RETURN 60 FOR 600 GOSUB 601 SPRITE 602 MUSIC 605 MOVE Y 606 MOVE Y 607 MOVE Y 608 MOVE Y 609 MOVE Y 61 SPRITE 610 MOVE Y 611 MOVE Y 612 MOVE Y 615 MOVE 618 IF 619 GOTO 65 GOSUB 650 MOVE 651 VARNAME 655 IF 657 GOTO 66 GOSUB 660 MOVE 665 GOTO 70 VARNAME 80 SPRITE